home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Present…ry 5: (Reseller Edition) / Apple Reference & Presentations Library 5.0 (Reseller Edition).iso / 6-Developer Demos / Developer Demos-Gen. / Mac Yellow Pages 1.0 / card_34152.txt < prev    next >
Text File  |  1990-08-17  |  14KB  |  733 lines
  1. -- card: 34152 from stack: in.0
  2. -- bmap block id: 34329
  3. -- flags: 4000
  4. -- background id: 31331
  5. -- name: Advertising Rate
  6. ----- HyperTalk script -----
  7. on help
  8.   send mouseUp to card button "Help"
  9. end help
  10.  
  11.  
  12. -- part 14 (button)
  13. -- low flags: 00
  14. -- high flags: 2000
  15. -- rect: left=96 top=76 right=125 bottom=169
  16. -- title width / last selected line: 0
  17. -- icon id / first selected line: 0 / 0
  18. -- text alignment: 1
  19. -- font id: 0
  20. -- text size: 12
  21. -- style flags: 0
  22. -- line height: 16
  23. -- part name: Full Screen
  24. ----- HyperTalk script -----
  25. on mouseUp
  26.   push card
  27.   visual effect zoom out
  28.   go to card "Full Screen"
  29.   put the ticks into startTime
  30.   visual effect zoom in
  31.   repeat forever
  32.     if the mouse is down or the ticks > startTime + 40 then
  33.       pop card
  34.       exit mouseUp
  35.     end if
  36.   end repeat
  37. end mouseUp
  38.  
  39.  
  40.  
  41. -- part 19 (button)
  42. -- low flags: 00
  43. -- high flags: 2000
  44. -- rect: left=412 top=76 right=125 bottom=485
  45. -- title width / last selected line: 0
  46. -- icon id / first selected line: 0 / 0
  47. -- text alignment: 1
  48. -- font id: 0
  49. -- text size: 12
  50. -- style flags: 0
  51. -- line height: 16
  52. -- part name: Full Screen
  53. ----- HyperTalk script -----
  54. on mouseUp
  55.   push card
  56.   visual effect zoom out
  57.   go to card "1/6 Screen"
  58.   put the ticks into startTime
  59.   repeat forever
  60.     if the ticks > startTime + 25 then
  61.       if the short name of this card is "Exit" then
  62.         visual effect zoom in
  63.         pop card
  64.         exit repeat
  65.       end if
  66.       visual effect checkerboard
  67.       go to next card
  68.       put the ticks into startTime
  69.     end if
  70.     if the mouse is down then
  71.       visual effect zoom in
  72.       pop card
  73.       exit repeat
  74.     end if
  75.   end repeat
  76. end mouseUp
  77.  
  78.  
  79.  
  80. -- part 3 (field)
  81. -- low flags: 01
  82. -- high flags: 0000
  83. -- rect: left=21 top=126 right=284 bottom=96
  84. -- title width / last selected line: 0
  85. -- icon id / first selected line: 0 / 0
  86. -- text alignment: 0
  87. -- font id: 3
  88. -- text size: 9
  89. -- style flags: 256
  90. -- line height: 12
  91. -- part name: 
  92.  
  93.  
  94. -- part 2 (field)
  95. -- low flags: 01
  96. -- high flags: 0000
  97. -- rect: left=96 top=126 right=284 bottom=169
  98. -- title width / last selected line: 0
  99. -- icon id / first selected line: 0 / 0
  100. -- text alignment: 1
  101. -- font id: 3
  102. -- text size: 9
  103. -- style flags: 0
  104. -- line height: 12
  105. -- part name: 
  106.  
  107.  
  108. -- part 4 (field)
  109. -- low flags: 01
  110. -- high flags: 0000
  111. -- rect: left=175 top=126 right=284 bottom=248
  112. -- title width / last selected line: 0
  113. -- icon id / first selected line: 0 / 0
  114. -- text alignment: 1
  115. -- font id: 3
  116. -- text size: 9
  117. -- style flags: 0
  118. -- line height: 12
  119. -- part name: 
  120.  
  121.  
  122. -- part 5 (field)
  123. -- low flags: 01
  124. -- high flags: 0000
  125. -- rect: left=254 top=126 right=284 bottom=327
  126. -- title width / last selected line: 0
  127. -- icon id / first selected line: 0 / 0
  128. -- text alignment: 1
  129. -- font id: 3
  130. -- text size: 9
  131. -- style flags: 0
  132. -- line height: 12
  133. -- part name: 
  134.  
  135.  
  136. -- part 6 (field)
  137. -- low flags: 01
  138. -- high flags: 0000
  139. -- rect: left=333 top=126 right=284 bottom=406
  140. -- title width / last selected line: 0
  141. -- icon id / first selected line: 0 / 0
  142. -- text alignment: 1
  143. -- font id: 3
  144. -- text size: 9
  145. -- style flags: 0
  146. -- line height: 12
  147. -- part name: 
  148.  
  149.  
  150. -- part 7 (field)
  151. -- low flags: 01
  152. -- high flags: 0000
  153. -- rect: left=412 top=126 right=284 bottom=485
  154. -- title width / last selected line: 0
  155. -- icon id / first selected line: 0 / 0
  156. -- text alignment: 1
  157. -- font id: 3
  158. -- text size: 9
  159. -- style flags: 0
  160. -- line height: 12
  161. -- part name: 
  162.  
  163.  
  164. -- part 8 (field)
  165. -- low flags: 01
  166. -- high flags: 0000
  167. -- rect: left=96 top=174 right=189 bottom=169
  168. -- title width / last selected line: 0
  169. -- icon id / first selected line: 0 / 0
  170. -- text alignment: 1
  171. -- font id: 3
  172. -- text size: 9
  173. -- style flags: 256
  174. -- line height: 12
  175. -- part name: 
  176.  
  177.  
  178. -- part 9 (field)
  179. -- low flags: 01
  180. -- high flags: 0000
  181. -- rect: left=175 top=173 right=188 bottom=248
  182. -- title width / last selected line: 0
  183. -- icon id / first selected line: 0 / 0
  184. -- text alignment: 1
  185. -- font id: 3
  186. -- text size: 9
  187. -- style flags: 256
  188. -- line height: 12
  189. -- part name: 
  190.  
  191.  
  192. -- part 10 (field)
  193. -- low flags: 01
  194. -- high flags: 0000
  195. -- rect: left=254 top=174 right=189 bottom=327
  196. -- title width / last selected line: 0
  197. -- icon id / first selected line: 0 / 0
  198. -- text alignment: 1
  199. -- font id: 3
  200. -- text size: 9
  201. -- style flags: 256
  202. -- line height: 12
  203. -- part name: 
  204.  
  205.  
  206. -- part 16 (button)
  207. -- low flags: 00
  208. -- high flags: 2000
  209. -- rect: left=175 top=76 right=125 bottom=248
  210. -- title width / last selected line: 0
  211. -- icon id / first selected line: 0 / 0
  212. -- text alignment: 1
  213. -- font id: 0
  214. -- text size: 12
  215. -- style flags: 0
  216. -- line height: 16
  217. -- part name: Full Screen
  218. ----- HyperTalk script -----
  219. on mouseUp
  220.   push card
  221.   visual effect zoom out
  222.   go to card "2/3 Screen"
  223.   put the ticks into startTime
  224.   repeat forever
  225.     if the ticks > startTime + 60 then
  226.       if the short name of this card is "Exit" then
  227.         visual effect zoom in
  228.         pop card
  229.         exit repeat
  230.       end if
  231.       visual effect checkerboard
  232.       go to next card
  233.       put the ticks into startTime
  234.     end if
  235.     if the mouse is down then
  236.       visual effect zoom in
  237.       pop card
  238.       exit repeat
  239.     end if
  240.   end repeat
  241. end mouseUp
  242.  
  243.  
  244.  
  245. -- part 18 (button)
  246. -- low flags: 00
  247. -- high flags: 2000
  248. -- rect: left=333 top=76 right=125 bottom=406
  249. -- title width / last selected line: 0
  250. -- icon id / first selected line: 0 / 0
  251. -- text alignment: 1
  252. -- font id: 0
  253. -- text size: 12
  254. -- style flags: 0
  255. -- line height: 16
  256. -- part name: Full Screen
  257. ----- HyperTalk script -----
  258. on mouseUp
  259.   push card
  260.   visual effect zoom out
  261.   go to card "1/3 Screen"
  262.   put the ticks into startTime
  263.   repeat forever
  264.     if the ticks > startTime + 40 then
  265.       if the short name of this card is "Exit" then
  266.         visual effect zoom in
  267.         pop card
  268.         exit repeat
  269.       end if
  270.       visual effect checkerboard
  271.       go to next card
  272.       put the ticks into startTime
  273.     end if
  274.     if the mouse is down then
  275.       visual effect zoom in
  276.       pop card
  277.       exit repeat
  278.     end if
  279.   end repeat
  280. end mouseUp
  281.  
  282.  
  283.  
  284. -- part 11 (field)
  285. -- low flags: 01
  286. -- high flags: 0000
  287. -- rect: left=333 top=174 right=189 bottom=406
  288. -- title width / last selected line: 0
  289. -- icon id / first selected line: 0 / 0
  290. -- text alignment: 1
  291. -- font id: 3
  292. -- text size: 9
  293. -- style flags: 256
  294. -- line height: 12
  295. -- part name: 
  296.  
  297.  
  298. -- part 12 (field)
  299. -- low flags: 01
  300. -- high flags: 0000
  301. -- rect: left=412 top=174 right=189 bottom=485
  302. -- title width / last selected line: 0
  303. -- icon id / first selected line: 0 / 0
  304. -- text alignment: 1
  305. -- font id: 3
  306. -- text size: 9
  307. -- style flags: 256
  308. -- line height: 12
  309. -- part name: 
  310.  
  311.  
  312. -- part 17 (button)
  313. -- low flags: 00
  314. -- high flags: 2000
  315. -- rect: left=254 top=76 right=125 bottom=327
  316. -- title width / last selected line: 0
  317. -- icon id / first selected line: 0 / 0
  318. -- text alignment: 1
  319. -- font id: 0
  320. -- text size: 12
  321. -- style flags: 0
  322. -- line height: 16
  323. -- part name: Full Screen
  324. ----- HyperTalk script -----
  325. on mouseUp
  326.   push card
  327.   visual effect zoom out
  328.   go to card "1/2 Screen"
  329.   put the ticks into startTime
  330.   repeat forever
  331.     if the ticks > startTime + 60 then
  332.       if the short name of this card is "Exit" then
  333.         visual effect zoom in
  334.         pop card
  335.         exit repeat
  336.       end if
  337.       visual effect checkerboard
  338.       go to next card
  339.       put the ticks into startTime
  340.     end if
  341.     if the mouse is down then
  342.       visual effect zoom in
  343.       pop card
  344.       exit repeat
  345.     end if
  346.   end repeat
  347. end mouseUp
  348.  
  349.  
  350.  
  351. -- part 20 (button)
  352. -- low flags: 00
  353. -- high flags: A003
  354. -- rect: left=439 top=32 right=54 bottom=503
  355. -- title width / last selected line: 0
  356. -- icon id / first selected line: 0 / 0
  357. -- text alignment: 1
  358. -- font id: 0
  359. -- text size: 12
  360. -- style flags: 0
  361. -- line height: 16
  362. -- part name: Return
  363. ----- HyperTalk script -----
  364. on mouseDown
  365.   play stop
  366.   play harpsichord a7e
  367. end mouseDown
  368.  
  369. on mouseUp
  370.   visual effect zoom in
  371.   go to card "Publicity"
  372. end mouseUp
  373.  
  374.  
  375. -- part 21 (button)
  376. -- low flags: 00
  377. -- high flags: 2000
  378. -- rect: left=12 top=305 right=337 bottom=48
  379. -- title width / last selected line: 0
  380. -- icon id / first selected line: 0 / 0
  381. -- text alignment: 1
  382. -- font id: 0
  383. -- text size: 12
  384. -- style flags: 0
  385. -- line height: 16
  386. -- part name: Help
  387. ----- HyperTalk script -----
  388. on mouseDown
  389.   play stop
  390.   play harpsichord a7e
  391. end mouseDown
  392.  
  393. on mouseUp
  394.   answer "Call (617) 577-9568 for more information." with "OK"
  395.   global startTime
  396.   put the seconds into startTime
  397. end mouseUp
  398.  
  399.  
  400.  
  401. -- part 23 (button)
  402. -- low flags: 00
  403. -- high flags: 2000
  404. -- rect: left=96 top=76 right=125 bottom=169
  405. -- title width / last selected line: 0
  406. -- icon id / first selected line: 0 / 0
  407. -- text alignment: 1
  408. -- font id: 0
  409. -- text size: 12
  410. -- style flags: 0
  411. -- line height: 16
  412. -- part name: Full Screen
  413. ----- HyperTalk script -----
  414. on mouseUp
  415.   push card
  416.   visual effect zoom out
  417.   go to card "Full Screen"
  418.   put the ticks into startTime
  419.   visual effect zoom in
  420.   repeat forever
  421.     if the mouse is down or the ticks > startTime + 40 then
  422.       pop card
  423.       exit mouseUp
  424.     end if
  425.   end repeat
  426. end mouseUp
  427.  
  428.  
  429.  
  430. -- part 24 (button)
  431. -- low flags: 00
  432. -- high flags: 0000
  433. -- rect: left=96 top=172 right=286 bottom=169
  434. -- title width / last selected line: 0
  435. -- icon id / first selected line: 0 / 0
  436. -- text alignment: 1
  437. -- font id: 0
  438. -- text size: 12
  439. -- style flags: 0
  440. -- line height: 16
  441. -- part name: Full Screen
  442. ----- HyperTalk script -----
  443. on mouseUp
  444.   push card
  445.   visual effect zoom out
  446.   go to card "Full Screen"
  447.   put the ticks into startTime
  448.   visual effect zoom in
  449.   repeat forever
  450.     if the mouse is down or the ticks > startTime + 40 then
  451.       pop card
  452.       exit mouseUp
  453.     end if
  454.   end repeat
  455. end mouseUp
  456.  
  457.  
  458.  
  459. -- part 25 (button)
  460. -- low flags: 00
  461. -- high flags: 0000
  462. -- rect: left=175 top=172 right=286 bottom=248
  463. -- title width / last selected line: 0
  464. -- icon id / first selected line: 0 / 0
  465. -- text alignment: 1
  466. -- font id: 0
  467. -- text size: 12
  468. -- style flags: 0
  469. -- line height: 16
  470. -- part name: Full Screen
  471. ----- HyperTalk script -----
  472. on mouseUp
  473.   push card
  474.   visual effect zoom out
  475.   go to card "2/3 Screen"
  476.   put the ticks into startTime
  477.   repeat forever
  478.     if the ticks > startTime + 60 then
  479.       if the short name of this card is "Exit" then
  480.         visual effect zoom in
  481.         pop card
  482.         exit repeat
  483.       end if
  484.       visual effect checkerboard
  485.       go to next card
  486.       put the ticks into startTime
  487.     end if
  488.     if the mouse is down then
  489.       visual effect zoom in
  490.       pop card
  491.       exit repeat
  492.     end if
  493.   end repeat
  494. end mouseUp
  495.  
  496.  
  497.  
  498. -- part 26 (button)
  499. -- low flags: 00
  500. -- high flags: 0000
  501. -- rect: left=254 top=172 right=287 bottom=327
  502. -- title width / last selected line: 0
  503. -- icon id / first selected line: 0 / 0
  504. -- text alignment: 1
  505. -- font id: 0
  506. -- text size: 12
  507. -- style flags: 0
  508. -- line height: 16
  509. -- part name: Full Screen
  510. ----- HyperTalk script -----
  511. on mouseUp
  512.   push card
  513.   visual effect zoom out
  514.   go to card "1/2 Screen"
  515.   put the ticks into startTime
  516.   repeat forever
  517.     if the ticks > startTime + 60 then
  518.       if the short name of this card is "Exit" then
  519.         visual effect zoom in
  520.         pop card
  521.         exit repeat
  522.       end if
  523.       visual effect checkerboard
  524.       go to next card
  525.       put the ticks into startTime
  526.     end if
  527.     if the mouse is down then
  528.       visual effect zoom in
  529.       pop card
  530.       exit repeat
  531.     end if
  532.   end repeat
  533. end mouseUp
  534.  
  535.  
  536.  
  537. -- part 27 (button)
  538. -- low flags: 00
  539. -- high flags: 0000
  540. -- rect: left=333 top=172 right=287 bottom=406
  541. -- title width / last selected line: 0
  542. -- icon id / first selected line: 0 / 0
  543. -- text alignment: 1
  544. -- font id: 0
  545. -- text size: 12
  546. -- style flags: 0
  547. -- line height: 16
  548. -- part name: Full Screen
  549. ----- HyperTalk script -----
  550. on mouseUp
  551.   push card
  552.   visual effect zoom out
  553.   go to card "1/3 Screen"
  554.   put the ticks into startTime
  555.   repeat forever
  556.     if the ticks > startTime + 40 then
  557.       if the short name of this card is "Exit" then
  558.         visual effect zoom in
  559.         pop card
  560.         exit repeat
  561.       end if
  562.       visual effect checkerboard
  563.       go to next card
  564.       put the ticks into startTime
  565.     end if
  566.     if the mouse is down then
  567.       visual effect zoom in
  568.       pop card
  569.       exit repeat
  570.     end if
  571.   end repeat
  572. end mouseUp
  573.  
  574.  
  575.  
  576. -- part 28 (button)
  577. -- low flags: 00
  578. -- high flags: 0000
  579. -- rect: left=412 top=172 right=286 bottom=485
  580. -- title width / last selected line: 0
  581. -- icon id / first selected line: 0 / 0
  582. -- text alignment: 1
  583. -- font id: 0
  584. -- text size: 12
  585. -- style flags: 0
  586. -- line height: 16
  587. -- part name: Full Screen
  588. ----- HyperTalk script -----
  589. on mouseUp
  590.   push card
  591.   visual effect zoom out
  592.   go to card "1/6 Screen"
  593.   put the ticks into startTime
  594.   repeat forever
  595.     if the ticks > startTime + 25 then
  596.       if the short name of this card is "Exit" then
  597.         visual effect zoom in
  598.         pop card
  599.         exit repeat
  600.       end if
  601.       visual effect checkerboard
  602.       go to next card
  603.       put the ticks into startTime
  604.     end if
  605.     if the mouse is down then
  606.       visual effect zoom in
  607.       pop card
  608.       exit repeat
  609.     end if
  610.   end repeat
  611. end mouseUp
  612.  
  613.  
  614.  
  615. -- part contents for card part 2
  616. ----- text -----
  617. 508 x 269
  618. pixels
  619.  
  620.  
  621.  
  622.  
  623. $995
  624.  
  625. $895
  626.  
  627. $805
  628.  
  629. $725
  630.  
  631. -- part contents for card part 3
  632. ----- text -----
  633.  
  634.  
  635.  
  636.  
  637.  
  638.  
  639. 1-Time Rate
  640.  
  641. 2-Time Rate
  642.  
  643. 3-Time Rate
  644.  
  645. 4-Time Rate
  646.  
  647. -- part contents for card part 4
  648. ----- text -----
  649. 337 x 269
  650. pixels
  651.  
  652.  
  653.  
  654.  
  655. $845
  656.  
  657. $760
  658.  
  659. $684
  660.  
  661. $616
  662.  
  663. -- part contents for card part 5
  664. ----- text -----
  665. 508 x 133
  666. pixels
  667.  
  668.  
  669.  
  670.  
  671. $645
  672.  
  673. $580
  674.  
  675. $522
  676.  
  677. $470
  678.  
  679. -- part contents for card part 6
  680. ----- text -----
  681. 166 x 269
  682. pixels
  683.  
  684.  
  685.  
  686.  
  687. $495
  688.  
  689. $445
  690.  
  691. $400
  692.  
  693. $360
  694.  
  695. -- part contents for card part 7
  696. ----- text -----
  697. 166 x 133
  698. pixels
  699.  
  700.  
  701.  
  702.  
  703. $300
  704.  
  705. $270
  706.  
  707. $243
  708.  
  709. $218
  710.  
  711. -- part contents for card part 8
  712. ----- text -----
  713. Full Screen
  714.  
  715. -- part contents for card part 9
  716. ----- text -----
  717. 2/3 Screen
  718.  
  719. -- part contents for card part 10
  720. ----- text -----
  721. 1/2 Screen
  722.  
  723. -- part contents for card part 11
  724. ----- text -----
  725. 1/3 Screen
  726.  
  727. -- part contents for card part 12
  728. ----- text -----
  729. 1/6 Screen
  730.  
  731. -- part contents for background part 13
  732. ----- text -----
  733. PUBLICITY